* lisp/button.el (button-map): Bind [follow-link] to 'mouse-face' (bug#49626)

diff --git a/lisp/button.el b/lisp/button.el
index 69d70540c06097f15d24a6204d6cd93ef4d9f02a..74dfb5d5419ae9c9ed73c97408189b8a5c11f0b4 100644 (file)
--- a/lisp/button.el
+++ b/lisp/button.el
@@ -61,6 +61,7 @@
     ;; might get converted to ^M when building loaddefs.el
     (define-key map [(control ?m)] 'push-button)
     (define-key map [mouse-2] 'push-button)
+    (define-key map [follow-link] 'mouse-face)
     ;; FIXME: You'd think that for keymaps coming from text-properties on the
     ;; mode-line or header-line, the `mode-line' or `header-line' prefix
     ;; shouldn't be necessary!